home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / c / xw2.000 / xw2 / xw / extensions / zaehler.xwx < prev   
Encoding:
Text File  |  1994-07-28  |  935 b   |  26 lines
  1.  
  2. /* ===XBW-Benutzeroberflaeche====================================
  3. \SystemUp{ 90 }; @xbw\start;              % 90 kB Datenbank Platz
  4. @wdw{ CNTR 3 4 20 11 };                   % Fenstername,x,y,b,h
  5. @button\stop{ CNTR1 2 9 };                % Objektname,x,y
  6. @button\cmd{  CNTR2 2 5,                  % Objektname,x,y
  7.    Zaehlerstand                           % Text
  8.    "\@ZaehlerAusdruck;" };                % Kommando
  9. \@ZaehlerInit;  % Siehe XbW_Extension_ZaehlerInit! u. COMMANDS.C!
  10. \End;
  11.    ===C-Programmteil===========================================*/
  12.  
  13. long Zaehler=0; int HookNo=-1;
  14.  
  15. void XbW_Extension_Zaehler(XbWDDb_DbIWdw *TW){ Zaehler++; };
  16. int XbW_Extension_ZaehlerInit(){
  17.   XbWPSy_SystemManagerHookAdd(&HookNo, XbW_Extension_Zaehler);
  18.   return(XbWDMf_CommandOk);
  19.   };
  20. int XbW_Extension_ZaehlerAusdruck(){
  21.   char sstr[200];  sprintf(sstr,"Zaehlerstand: %ld",Zaehler);
  22.   XbWFTb_Message(sstr);
  23.   return(XbWDMf_CommandOk);
  24.   };
  25.  
  26.